home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 5 / Apprentice-Release5.iso / Source Code / C / Applications / Python 1.3.3 / Python 133 SRC / Mac / Lib / test / tsnd.py < prev    next >
Text File  |  1995-01-30  |  421b  |  19 lines
  1. # Show off SndPlay (and some resource manager functions).
  2. # Get a list of all 'snd ' resources in the system and play them all.
  3.  
  4. from Res import *
  5. from Snd import *
  6.  
  7. ch = SndNewChannel(0, 0, None)
  8. print "Channel:", ch
  9.  
  10. type = 'snd '
  11.  
  12. for i in range(CountResources(type)):
  13.     r = GetIndResource(type, i+1)
  14.     print r.GetResInfo(), r.size
  15.     if r.GetResInfo()[0] == 1:
  16.         print "Skipping simple beep"
  17.         continue
  18.     ch.SndPlay(r, 0)
  19.